package com.ek.controller;

import java.io.File;
import java.io.PrintWriter;
import java.text.SimpleDateFormat;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collections;
import java.util.Comparator;
import java.util.Date;
import java.util.HashMap;
import java.util.Hashtable;
import java.util.Iterator;
import java.util.List;
import java.util.Map;
import java.util.Random;

import javax.servlet.ServletResponse;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.apache.commons.io.FileUtils;

import com.alibaba.fastjson.JSON;
import com.alibaba.fastjson.JSONObject;
import com.ek.util.ConstantVars;
import com.jfinal.config.Constants;
import com.jfinal.core.ActionKey;
import com.jfinal.core.Controller;
import com.jfinal.core.JFinal;
import com.jfinal.render.JsonRender;

public class UploadManage extends Controller{
	/**
	 * 编辑器的图片上传
	 */
	public void UploadImage(){
		/*PrintWriter out = null;*/
		//文件保存目录路径，可以指定绝对路径，比如 /root/upload/
		String savePath=ConstantVars.REAL_PATH;
		//文件保存目录URL，可以指定绝对路径，比如 /upload/
		String saveUrl=ConstantVars.REQUEST_PATH;
		getResponse().setContentType("text/html;charset=UTF-8");
		getResponse().setCharacterEncoding("UTF-8");
		try{
			//创建并保存文件
			com.jfinal.upload.UploadFile file = getFile("imgFile",saveUrl,ConstantVars.IMG_MAX_SIZE,"utf-8");
			/*out = getResponse().getWriter();*/
			String affix_id = "";
	        String affix_name = "";
        
			//定义允许上传的文件扩展名
			HashMap<String, String> extMap = new HashMap<String, String>();
			extMap.put("image", "gif,jpg,jpeg,png,bmp");
			extMap.put("flash", "swf,flv");
			extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
			extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2,pdf");

			if (file==null) {
				renderJson(getResultObject(1,"请选择文件","",""));
				return;
			}
			//检查目录
			File uploadDir = new File(savePath);
			if(!uploadDir.isDirectory()){
				renderJson(getResultObject(1,"上传目录不存在。","",""));
				return;
			}
			//检查目录写权限
			if(!uploadDir.canWrite()){
				renderJson(getResultObject(1,"上传目录没有写权限。","",""));
				return;
			}

			String dirName = getPara("dir") == null?"image":getPara("dir");
			if(!extMap.containsKey(dirName)){
				renderJson(getResultObject(1,"目录名不正确。","",""));
				return;
			}
			//创建文件夹
			savePath += dirName + "/";
			saveUrl += dirName + "/";
			File saveDirFile = new File(savePath);
			if (!saveDirFile.exists()) {
				saveDirFile.mkdirs();
			}
			//创建需保存的单个文件夹
			String singleDirName = getPara("singleDieName");
			savePath += singleDirName + "/";
			saveUrl += singleDirName + "/";
			File saveSingleDirFile = new File(savePath);
			if (!saveSingleDirFile.exists()) {
				saveDirFile.mkdirs();
			}
			 affix_name = file.getFile().getName();
	         File affix_file = file.getFile();
			//检查扩展名
	         String fileExt = affix_name.substring(affix_name.lastIndexOf(".") + 1).toLowerCase();
	         if(!Arrays.<String>asList(extMap.get(dirName).split(",")).contains(fileExt)){
	        	 renderJson(getResultObject(1,"上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。","",""));
				affix_file.delete();
				return;
			}else {
				 SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");
	                affix_id = df.format(new Date()) + "_" + new Random().nextInt(1000)+"."+fileExt;
	                File savefile = new File(new File(savePath),affix_id);
	                FileUtils.copyFile(affix_file, savefile);
	                if(affix_file.exists()){
	                	affix_file.delete();
	                }
			}
	         renderJson(getResultObject(0,"上传成功",saveUrl+affix_id,affix_name));
	}catch(Exception e){
		renderJson(getResultObject(1,"上传文件失败。","",""));
		return;
	}
	}
	/**
	 * 上传错误信息
	 */
    private Map getResultObject(int error,String message,String url,String fileName) {
    	Map<String,Object> obj=new HashMap<String,Object>();
    	obj.put("error",error);
    	obj.put("message", message);
    	obj.put("url",url);
    	obj.put("title", fileName);
    	return obj;
    }   
    
	/**
	 * 编辑器的文件上传
	 */
    @SuppressWarnings({ "rawtypes", "unchecked" })
    public void uploadFileKeditor(){
    		PrintWriter out=null;
	try {
		out=getResponse().getWriter();
		//文件保存目录路径（绝对路径），比如 /home/tomcat/upload/
		String rootPath=ConstantVars.REAL_PATH;
		//文件保存目录URL,比如 /upload/
		String rootUrl=ConstantVars.REQUEST_PATH;

		//图片扩展名
		String[] fileTypes = new String[]{"gif", "jpg", "jpeg", "png", "bmp"};
		String dirName = getPara("dir");
		if (dirName != null) {
			if(!Arrays.<String>asList(new String[]{"image", "flash", "media", "file"}).contains(dirName)){
				out.println("Invalid Directory name.");
				return;
			}
			rootPath += dirName + "/";
			rootUrl += dirName + "/";
			File saveDirFile = new File(rootPath);
			if (!saveDirFile.exists()) {
				saveDirFile.mkdirs();
			}
		}
		//根据path参数，设置各路径和URL
		String path = getPara("path")!= null ?getPara("path") : "";
		String currentPath = rootPath + path;
		String currentUrl = rootUrl + path;
		String currentDirPath = path;
		String moveupDirPath = "";
		if (!"".equals(path)) {
			String str = currentDirPath.substring(0, currentDirPath.length() - 1);
			moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0, str.lastIndexOf("/") + 1) : "";
		}

		//排序形式，name or size or type
		String order = getPara("order") != null ?getPara("order").toLowerCase() : "name";
		//目录不存在或不是目录
		File currentPathFile = new File(currentPath);
		if(!currentPathFile.isDirectory()){
			out.println("Directory does not exist.");
			return;
		}

		//遍历目录取的文件信息
		List<Hashtable> fileList = new ArrayList<Hashtable>();
		if(currentPathFile.listFiles() != null) {
			for (File file : currentPathFile.listFiles()) {
				Hashtable<String, Object> hash = new Hashtable<String, Object>();
				String fileName = file.getName();
				if(file.isDirectory()) {
					hash.put("is_dir", true);
					hash.put("has_file", (file.listFiles() != null));
					hash.put("filesize", 0L);
					hash.put("is_photo", false);
					hash.put("filetype", "");
				} else if(file.isFile()){
					String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
					hash.put("is_dir", false);
					hash.put("has_file", false);
					hash.put("filesize", file.length());
					hash.put("is_photo", Arrays.<String>asList(fileTypes).contains(fileExt));
					hash.put("filetype", fileExt);
				}
				hash.put("filename", fileName);
				hash.put("datetime", new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file.lastModified()));
				fileList.add(hash);
			}
		}

		if ("size".equals(order)) {
			Collections.sort(fileList, new SizeComparator());
		} else if ("type".equals(order)) {
			Collections.sort(fileList, new TypeComparator());
		} else {
			Collections.sort(fileList, new NameComparator());
		}
		Map<String,Object> result = new HashMap<String, Object>();
		result.put("moveup_dir_path", moveupDirPath);
		result.put("current_dir_path", currentDirPath);
		result.put("current_url", currentUrl);
		result.put("total_count", fileList.size());
		result.put("file_list", fileList);
		out.println(new JSONObject(result).toJSONString());
	} catch (Exception e) {e.printStackTrace();}
    }
    

    @SuppressWarnings("rawtypes")
	public class NameComparator implements Comparator {
    	public int compare(Object a, Object b) {
    		Hashtable hashA = (Hashtable)a;
    		Hashtable hashB = (Hashtable)b;
    		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
    			return -1;
    		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
    			return 1;
    		} else {
    			return ((String)hashA.get("filename")).compareTo((String)hashB.get("filename"));
    		}
    	}
    }
    @SuppressWarnings("rawtypes")
	public class SizeComparator implements Comparator {
    	public int compare(Object a, Object b) {
    		Hashtable hashA = (Hashtable)a;
    		Hashtable hashB = (Hashtable)b;
    		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
    			return -1;
    		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
    			return 1;
    		} else {
    			if (((Long)hashA.get("filesize")) > ((Long)hashB.get("filesize"))) {
    				return 1;
    			} else if (((Long)hashA.get("filesize")) < ((Long)hashB.get("filesize"))) {
    				return -1;
    			} else {
    				return 0;
    			}
    		}
    	}
    }
    @SuppressWarnings("rawtypes")
	public class TypeComparator implements Comparator {
    	public int compare(Object a, Object b) {
    		Hashtable hashA = (Hashtable)a;
    		Hashtable hashB = (Hashtable)b;
    		if (((Boolean)hashA.get("is_dir")) && !((Boolean)hashB.get("is_dir"))) {
    			return -1;
    		} else if (!((Boolean)hashA.get("is_dir")) && ((Boolean)hashB.get("is_dir"))) {
    			return 1;
    		} else {
    			return ((String)hashA.get("filetype")).compareTo((String)hashB.get("filetype"));
    		}
    	}
    }
}
